DDDDDDDDDDDD EEEEEEEEEEEEEEE BBB8BBBB8BB8B UUU UUU GGGGGGGGGGGG 
DODDDDDDDDDD EEEEEEEEEEEEEEE BBB888BB8BBBB UUU UUU GGGGGGGGGGGG 
DDDDDDDDDDDD EEEEEEEEEEEEEEE B8BB8BB8BBEB UUU UUU GGGGGGGGGGGG 
DOD | DDD EEE BBB BBB UUU UU G 

DOD DDD EEE BBB BBB UUU UUU GGG 

DDD DDD EEE 888 BBB UUU UUU GGG 

DOD DOD EEE BBB BBB UUU UUU GGG 

DDD DOD EEE 888 BBB UUU UUU GGG 

DOD DDD EEE BBB BBB UUU UUU GGG 

DOD DDD EEEEEEEEEEEE BBBBBBBBBBBB UUU UUU GGG 

DDD DDD EEEEEEEEEEEE BBBBBBBS8EEBB UUU UUU GGG 

DOD DDD EEEEEEEEEEEE BBBBBBBSBBBB UUU UUU GGG 

DOD DDD EEE BBB UUU UUU GGG GG6GGGGGGG 
DDD DDD EEE B88 BBB UUU UUU GGG 6G6G6G6GGGG6G 
DOD DDD EEE BBB BBB UUU UUU GGG 666666666 
DDD DDD EEE 888 BBB UUU UUU GGG GGG 
DOD DDD EEE BBB BBB UUU UUU GGG GGG 
DOD DDD EEE BBB BBB UUU UUU GGG GGG 
DDDDDDDDDDDD EEEEEEEEEEEEEEE B88B8BB8B888 UUUUUUUUUUUUUUU GGGGGGGGG 
DDDDDODDDDDD EEEEEEEEEEEEEEE BBSBBBB8BBBB UUUUUUUUUUUUUUU GGGGGGGGG 
DDDDDDDDDDDD EEEEEEEEEEEEEEE BB8B8BBBBBBBB UUUUUUUUUUUUUUU GGGGGGGGG 


**F ILE**1D**DBGGEN 
DDDDDDDD BBBBBB88 GGGGGGGG GGGGGGGG EEEEEEESEE NN NN 
DDDDDDDD BBBBBBBB GGGGGGGG GGGGGGGG EEEEEEEEEE NN NN 
dD DD 88 BB GG GG EE NN NN 
dD DD 88 BB GG GG EE NN NN 
DD DD 8B BB GG GG EE NNNN NN 
dD DD 6B BB GG GG EE NNNN NN 
dD DD 88888888 GG GG EEEEEEEE NN NN NN 
DD DD GG GG EEEEEEEE NN NN NN 
DD DD 88 BB GG GGGGGG GG GGGGGG EE NN NNNN 
DD DD 88 BB GG GGGGGG GG GGGGGG EE NN NNNN 
dD DD 88 BB GG GG GG GG EE NN NN ees 
DD DD 88 BB GG GG 6G GG EE NN NN cece 
DDDDDDDD GGGGGG GGGGGG EEEEEEEEEE NN NN eee 
DDDDDDDD BBBBBBBB GGGGGG GGGGGG EEEEEEEEEE NN NN eee 
RRRRRRRR EEEEEEEEEE Q20000 
RRRRRRRR EEEEEEEEEE QQQaaa 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RR RR EE QQ QQ 
RRRRRRRR EEEEEEEE QQ QQ 
RRRRRRRR EEEEEEEE QQ 
RR RR EE QQ QQ QQ 
RR RR EE Qa aa QQ 
RR RR EE QQ QQ 
RR RR EE Qu QQ 
RR RR EEEEEEEEEE Q00Q Qa 
RR RR EEEEEEEEEE Q@Qa a0 
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: DBGGEN.REQ = Require file for VAX/VMS DEBUG facility. 
; Version: *v04-000' 
i eeeereerereereeererereeeeeererereeteeeeeeneeeeeeeneereeeeeeereeeeereeteeeees 


ie COPYRIGHT (c) 1978 1980, 1982, 1984 B 
ie Dl GITAL EQUIPM 1 CORPO RATION, MAYNARD. MASSACHUSETTS. 
ie ALL RIGHTS RESERVED 


& 
® 
® 
® 
oe 
OFTWARE 1S FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
N ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
ION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * 
i THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
ie OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY ®* 
ie TRANSFERRED. * 
& 
it THE INFORMATION IN THIS SOFTWARE IS SUBJECT 10 CHANGE WITHOUT NOTICE  * 
ie SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT + 
is CORPORATION. * 
= 
* 
® 
ie 
® 
* 


tt DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
'® SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


IT 
TA 


See REPRE EAA AAAAAAEAAAEAAAEAAAAAAAAARARAAAAAARAAAAERAAAAAAAAAEAAEE AREER 
' 


lee 


: Modified by: 
‘ Bruce Olsen, 30 y * 1979 
Richard Title, 20 ug 1981 
9-Jun-80 DLP Added literals for PL/I, PASCAL, and C 
: ee) DLP chs_per_lexeme is now 
: 0-AUG-81 RT Changed” step_lvl_size and added step_source 
¢ because of néw command 
‘ SET oSTEP SOURCE 
: 20-JAN-82 RT Moved CIS declarations from here to DBGLIB. 
i] 


06-MAY-82 RT Added structures for DEFINE 
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MACRO 

NULL_POS_SIZE 
OPERAND _MODE 
OPERAND ~VALUE 


DBG_FAC_CODE 
THREAD FODE 


5 
‘4 
=) 
mmo 
te 
oO 

~ 

~~" 
nvnmn 


NO_OVERRIDE 
TTY_OUT_WIDTH 
TTY_ASCTI_LEN 


MAX~STACK~PTR 


NO_OF _ TOKENS 
MAX_BYTE_INT 
BREAK_ 
TRACE_POINT 
WATCH_POINT 
WRITE _WATC 
EXECOTE_WATCH 


ASCII“OFFSET 


LINEFEED 


ET 
ET 


NO_OF _INP~CHARS 
CHS_PER_LEXEME 


ALL“BPTS 
BPT~ INSTRUCTION 
Ak_POINT 


HW 
READ QRIT_WATCH 


NUM_MAX_LENGTH 
SYM LENGTH 
UPPER_CASE_DIF 


=0, 0, 0%, 
=0, 4, 4, te 
=0, 0, 4, 0%; 


= 2 * 65536, 
si, 


= 942, 
= 80, 


: size parameters 
MAX_ASCII_LENG 


nunnun 
vet 


= 2: 
=11, 

- ‘AY, 
=%0'60', 


=%0°12°, 


The next three Literals used to 


Values for register name tables 
REGISTER_COUNT =17, 


: ASCII character representations 
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Null PSE for undotted references to 
blocks 


Mode part of an operand 
Value part of an operand 


DEBUG facility code 

Conditional switch for threaded code 
Mask for fatal bit in error codes 
Add offset to value 

Subtract offset from value 


be defined in SYSLIT.RES. 


Use current Length and radix 
Width of terminal Line 


! Max size of character variable 


Seventeen registers counting PSL 


Largest N in “‘ASCII:N” 

Depth of the parser's parse stack. | 

Max number of characters in input Line 
seeMust be divisible by 4*** ¥ 

Max number of characters in a single lexeme 
eeeMust be divisible by 4*** 

Max number of tokens permitted 

***Must be an even numberttt 

Largest byte integer 

ALL breakpoints in chain 

Opcode assignment for bpt instruction (srm revision 3) 
Table entry is breakpoint 

Table entry is tracepoint 

Table entry is watchpoint 


Watchpoint is for write access 
Watchpoint is for read/write access 
This is break or trace point 


Maximum number of characters per numeric string 
Maximum number of characters per symbol 


Difference between ASCII representation of upper and lower case 


Offset from numeric value to ASCII value 


ASCII representation of Linefeed 
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CARRIAGE _RET =%0'15', ! ASCII representation of carr loge return 

ASC_AT_SIGN =ZASCI1 ‘a', ! ASCII representation of an at sign 

ASC-CLOS_PAREN =ZASCII r ! ASCII representation of closed parenthesis 

ASC. =ZASCII °,*, : ASCII representation of a comma 

ASC_DOUB_QUOTE =ZASCII °°", ! ASCII representation of a double quote 

ASC_M =ZASCII ‘=', ! ASCII representation of a minus s ri 

ASC_OPEN PAREN =ZASCII ‘(', ! ASCII representation of open parenthesis 

ASC_PERCENT SZASCII ‘2', ! ASCII representation of a percent sign 

ASC_PERIOD =ZASCII ‘.', ! ASCII representation of a period 

ASC_PLUS =ZASCII ‘+', ! ASCII representation of a plus sign 

ASC_POUNDS =ZASCI1 a ! ASCII representation of a pounds sign 

ASC_QUOTE SCII ‘*'*,  ! ASCII representation of a quote character 

ASC_SPACE Mas 2" ! ASCII representation of a space 

ASC_SQ_CLO_BRAK =ZASCII pee ! ASCII representation of a closed square bracket 

ASC_SQ_OPN_ =ZASCII ‘C', ! ASCII representation of an open square bracket 
2 = 9 ! ASCII representation of a ta 

ASC"UP_ARROW  =RASCII '**, =! ASCII representation of an up arrow 


! The ‘mode’ data structure is geal ly just 
: a byte vector with the following characteristics. 


MODE_LVL_SIZE  =10, ! Number of bytes in each level.. 
MODE-LEVELS =4, ! Number of levels for mode settings 


: Each level of the mode data strucutre has the following entries: 


pick up the Constant as G_FLOAT 
constant 


MODE _RADIX =0, ! Radix = dec, hex, oct, etc. 
MODE _LENGTH =1, ' Length - Long. word, byte. etc. 
MODE _SYMBOLS =2, : Boolean -> whether we know values 
: as ‘extern + offset’ or not. 
MODE _ INSTRUC =3, ! Boolean => whether we input/output 
: values as machine instruction. 
MODE _ASCII =4, ! Boolean -> whether we output (only!) 
: values as ASCII strings or not. 
MODE _ SCOPE =5, ! Whether or not there is a CSP, 
: (and whether we should apply it) 
MODE _GLOBALS =6, ! Whether or not we should apply global 
: scope first in the search rules. 
MODE_FORTRAN  =7, ' ZLINE, ZLABEL 
MODE_IMMEDIATE <=8 ! FORTRAN address or contents of mode 
MODE“G_FLOATS = 9, i Set the mode to G_FLOAT, so we can 
! 


: The four levels have the following names and indices. 


DEF AULT_MODE 
MODE 


! Default system initialized mode 
USER_DEF_MOD 
OVERRIDE MODE 
LOCAL_MODE 


! User-set default mode 
! One-line override mode 
' Local mode 


Wn—o 
m~ sees 


: The mode_length field should be one of the following. 
BYTE_LENGTH =1, ! Byte Length 
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WORD_LENGTH =2, ! Word Length 

LONG_LENGTH =4, ! Longword length 

: And the mode_radix field should be one of: 

DECIMAL_RADIX =10, ' Decimal radix 

HEX RADIX =16, ' Hexadecimal radix 
OCTAL_RADIX =8, ' Octal radix 

BINARY_RADIX =2, ! Binary radix 

: The FORTRAN mode fields are as follows: 

LABEL_MODE zi, ' Numbers are Label numbers 
LINE MODE =2, ' Numbers are Line numbers 
LITERAL_MODE =3, ! Numbers are Literal values 


: The *STEP* data structure is really just a byte vector with the 
following characteristics. It is isomorphic to the ‘mode’ structure. 


STEP_LVL SIZE = 


! Number of bytes in each level. 
STEP_LEVELS 


4, 
Be ! Number of levels for step settings 


Each level of the step data strucutre has the following entries: 


STEP_LINE =0, ! LINE or_INSTRUCTION (a boolean) 
STEP_NOSYSTEM =1, !' CNOJSYSTEM steps (a boolean) 
STEP_OVER =2, ! INTO or OVER (a boolean) 
STEP_SOURCE =3, ! SOURCE or NOSOURCE 


The three levels have the following names and indices. 


DEFAULT_STEP =0, ' Default system initialized step 
USER_DEF_STEP =1, ! User-set default step type 
OVERRIDE-STEP =2, ! One-line override step type 


! The data structure which holds the settings for SET SEARCH is 
! a byte vector with the following characteristics (it works the 
same as the STEP data structure above) 


SEARCH_LVL_SIZE = 2, 
SEARCH_LEVELS = 3, 


: Each level of the data structure has the following entries 


SEARCH_ALL = 0, 
SEARCH_IDENT = 1, 


: The three levels have the following names and indices 
DEFAULT SEARCH = 0 
USER_DEF_SEARCH = 1, 
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OVERRIDE SEARCH = 2, 


The data structure which holds the settings for SET DEFINE is 
a@ byte vector with the following characteristics (it works the 
same as the STEP data structure above) 


1 

i 

' 

i 

DEFINE _LVL_SIZE = 1, 

DEFINE-LEVELS = 3, 

: Each level of the data structure has only one entry 
DEF INE_ONLY = 0, 


The three levels have the following names and indices 


DEFAULT_DEFINE = © 
USER_DEF_DEFINE = f, 
OVERRIDE-DEF INE = 2. 


! The output configuration data structure is comparable to the STEP or 
! MODE data structures except that it has only one level. It is used 
i to store information pertaining to DEBUG's output setting. 


OuTPUT_SIZE = 3, ! Number of bytes in the data structure 


The following entries are contained in the output config vector: 


7 = 0, ' LOG or NOLOG 

T_TERM e ty !' TERMINAL or NOTERMINAL 
OUT_VERIFY = ¢: ' VERIFY or NOVERIFY 
OUT_SCREEN = 3, ! SCREEN_LOG or NOSCREEN_LOG 


! Used to identify the flavor of type between dbg$show_type and its 
: callers. 


DEFAULT 0, 
OVERRIDE 1 


; Bit configurations for context flags. 
CONTEXT_BITS =32, ! Number of context bits 


Position of opcode byte at a breakpoint 
OPCODE_BYTE =0, ! Opcode offset 


! Location types for end range arguments 


—— 
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v 
MEMORY _LOC =0, ! 
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Memory location 


} Names of exception types for traceback. 


NOT_AN_EXC =0, ' 
RAP hse 23° 
LOOKUP_EXc =§: : 


Line number searching for pc 

PC of erap searching for Line number 

PC of fault searching for tine number 

Like ee only don’t do VAL_TO_SYM 
again. 


Literals to define the various address spaces in the VAX architecture. 


LITERAL 
SYSTEM_SPACE = %X*80000000', 
P1_SPATE = %x"40000000° ; 
LITERAL 
: Language names 
LANG_MACRO = 0, 
LANG_FORTRAN = 1, 
LANG_BLISS = ¢° 
LANG_ COBOL = 3, : 
LANG_BASIC = 4, : 
LANG_PLI = 5, ! 
LANG_PASCAL = $. : 
LA = 7, ‘ 
MAX_CANGUAGE = 6; ; 


COBOL 

BASIC+2 

PL/I 

pester 

Languages 0 - 6 (C not supported yet) 


! The semantic stack is a BLOCKVECTOR for which the following fields 


: are defined... 
FIELD STACK. FIELDS = 


STKSV" INDEX 
STKSV_OF FSET 
STK$V~POS 
STKS$V~TYPE 
STKSV~SIZE 
S 


nnunnnnnnnnhnhnhnhnonue 
e288 ee IOLA 
ee 3s we 
e 


STK$V_DOT 
STKSV_STRUC 
TES; 


Base of block. 

First value fietd 

Second value field 

Pointer to name table entry 
Index field 


e 
Size tizid 
Sign extension bit 

Is token a REF bit 
Immediate mode bit 

Access actuals supplied bit 
<field_ref> supplied flag 
Indirection fla 

Kind of BLISS structure 


—_——-—— 
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LITERAL 

STACK_ENTRY_SIZ = g. ! No of longwords in a semantic_stack BLOCK 

NO_STRUC = 0, ! BLISS structure types 

VECTR = 1, 

BITVEC = ¢° 

BLOK = 3, 

BLOCKVEC = 4; 


MACRO 
SEMANTIC_STACK = BLOCKVECTOR(20, STACK_ENTRY_SIZ] FIELD(STACK_FIELDS)2; 


! General purpose structure for manipulation of singly Linked Lists. Each cell 
! contains two long-word fields. The first is a pointer to the next List Link 
cell; the second is a pointer to the current element in the List. 


LITERAL 
LIST_LINK_SIZE = 8; ! Bytes in a List Link cell 
FIELD LEST LIF Uns . 
NEXT_ONE_PTR = (0,0,32,0], ! Pointer to the next Link cell , 
5 eee = (4,0,32,0] ! Pointer to the current object in the List 
MACRO 


, LIST_LINK = BLOCKCLIST_LINK_SIZE, BYTE] FIELD(LIST_LINK_FLDS)2; 
| End of DBGGEN.REQ 
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